home *** CD-ROM | disk | FTP | other *** search
- /*************************************************************************
- *
- * DeChunker
- *
- * Copyright ©1995 Lee Kindness
- * cs2lk@scms.rgu.ac.uk
- *
- * dechunk.c
- */
-
- #include "dechunk.h"
-
-
- /*************************************************************************
- * main() - DaDDDaaah!
- */
-
- int main(int argc, char **argv)
- {
- long ret = 10;
- /* init */
- if( InitSystem() )
- {
- struct Args *args;
-
- if( args = GetDeChunkArgs(argc, argv) )
- {
- FILEt dest;
-
- if( dest = OS_fopen(args->arg_Filename, FILEOPEN_WRITE) )
- {
- char *srcname;
- long num = 0;
- FILEt src;
-
- while( (srcname = BuildFName(args->arg_Basename, &num)) &&
- (src = OS_fopen(srcname, FILEOPEN_READ)) )
- {
- register int c;
-
- OS_printf("%s\n", srcname);
-
- for( c = OS_fgetc(src);
- c != EOF;
- c = OS_fgetc(src) )
- OS_fputc(c, dest);
-
- FreeFName(srcname);
- OS_fclose(src);
- }
-
- ret = 0;
-
- OS_fclose(dest);
- }
- FreeDeChunkArgs(args);
- }
- FreeSystem();
- }
-
- return( ret );
- }
-
-